www.gusucode.com > (粗糙集数据分析工具箱) matlab源码程序 > matlab代做 修改 程序工具箱 (粗糙集数据分析工具箱) matla 中使用/rsda/pos.m

    function y=pos(p,q)
s=1;j=1;b(1,:)=x(1,:);
[p1,q1]=size(x);%[m,n]=size(a);
for i=2:p1
     num=0;
     ss=x(i,:)==x(j,:);
        [u,v]=size(ss);
        l=ones(u,v);
        ss=ss*l';
        if ss==p1
            break;
        end
        num=num+1;
    if num==i-1
        y(s,:)=x(i,:);
        s=s+1;        
   end
end
y